PC World Komputer 2007 December/PCWKCD1207B.iso/Najgorsze komunikatory/Tlen.pl/tleninst60255.exe/tlen.exe/0/RCDATA/TAVATARFORM/TAVATARFORM.txt

Text File | 2007-09-27 | 6KB | 298 lines

object AvatarForm: TAvatarForm
  Left = 217
  Top = 175
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Awatar - ustawianie'
  ClientHeight = 415
  ClientWidth = 438
  Color = clBtnFace
  Constraints.MinHeight = 300
  Constraints.MinWidth = 400
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Verdana'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Panel2: TPanel
    Left = 0
    Top = 365
    Width = 438
    Height = 32
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    DesignSize = (
      438
      32)
    object cancelButton: TButton
      Left = 356
      Top = 2
      Width = 75
      Height = 27
      Anchors = [akTop, akRight, akBottom]
      Caption = 'Zamknij'
      TabOrder = 0
      OnClick = cancelButtonClick
    end
    object Button2: TButton
      Left = 96
      Top = 3
      Width = 76
      Height = 25
      Action = setAction
      TabOrder = 1
    end
    object browseButton: TButton
      Left = 8
      Top = 3
      Width = 82
      Height = 25
      Action = chooseAction
      TabOrder = 2
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 32
    Width = 292
    Height = 331
    Align = alCustom
    Caption = 'Obrazek'
    Ctl3D = True
    ParentCtl3D = False
    TabOrder = 1
    object TrackBar1: TTrackBar
      Left = 3
      Top = 303
      Width = 224
      Height = 25
      Hint = 'Rozmiar kadru'
      Align = alCustom
      Anchors = [akLeft, akRight, akBottom]
      Max = 130
      Orientation = trHorizontal
      ParentShowHint = False
      Frequency = 1
      Position = 0
      SelEnd = 0
      SelStart = 0
      ShowHint = False
      TabOrder = 0
      ThumbLength = 15
      TickMarks = tmBoth
      TickStyle = tsNone
      OnChange = TrackBar1Change
    end
    object imagePanel: TPanel
      Left = 8
      Top = 16
      Width = 276
      Height = 276
      Align = alCustom
      Anchors = [akLeft, akTop, akRight, akBottom]
      BevelOuter = bvNone
      TabOrder = 1
      object imagePaintBox: TPaintBox
        Left = 0
        Top = 0
        Width = 276
        Height = 276
        Align = alClient
        OnMouseDown = imagePaintBoxMouseDown
        OnMouseMove = imagePaintBoxMouseMove
        OnMouseUp = imagePaintBoxMouseUp
        OnPaint = imagePaintBoxPaint
      end
    end
    object sizeComboBox: TComboBox
      Left = 228
      Top = 302
      Width = 58
      Height = 21
      Hint = 'Wielko'#347#263' skali wy'#347'wietlanego obrazka'
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      Text = '100%'
      OnChange = sizeComboBoxChange
      Items.Strings = (
        '100%'
        '75%'
        '50%'
        '25%'
        '20%'
        '10%')
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 397
    Width = 438
    Height = 18
    Panels = <>
    SimplePanel = True
    SizeGrip = False
  end
  object GroupBox1: TGroupBox
    Left = 306
    Top = 167
    Width = 127
    Height = 53
    Align = alCustom
    Caption = 'Parametry'
    TabOrder = 3
    object Label5: TLabel
      Left = 8
      Top = 88
      Width = 21
      Height = 13
      Caption = 'Typ'
      Visible = False
    end
    object setTypeComboBox: TComboBox
      Left = 64
      Top = 88
      Width = 65
      Height = 21
      Style = csDropDownList
      Enabled = False
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 0
      Text = '64x64'
      Visible = False
      Items.Strings = (
        '64x64')
    end
    object avPublic: TCheckBox
      Left = 12
      Top = 21
      Width = 97
      Height = 17
      Caption = 'Publiczny'
      Checked = True
      State = cbChecked
      TabOrder = 1
    end
  end
  object GroupBox4: TGroupBox
    Left = 306
    Top = 226
    Width = 127
    Height = 136
    Caption = 'Podgl'#261'd'
    TabOrder = 4
    object preViewPaintBox: TPaintBox
      Left = 8
      Top = 18
      Width = 110
      Height = 110
      OnPaint = preViewPaintBoxPaint
    end
  end
  object avatarsComboBox: TComboBox
    Left = 8
    Top = 8
    Width = 425
    Height = 21
    Hint = 'Ostatnio u'#380'ywane awatary'
    Style = csDropDownList
    ItemHeight = 13
    ParentShowHint = False
    ShowHint = True
    TabOrder = 5
    OnChange = avatarsComboBoxChange
  end
  object GroupBox3: TGroupBox
    Left = 306
    Top = 31
    Width = 127
    Height = 129
    Caption = 'Aktualny awatar'
    TabOrder = 6
    object Label6: TLabel
      Left = 87
      Top = 56
      Width = 21
      Height = 13
      Caption = 'Typ'
      FocusControl = getTypeComboBox
      Visible = False
    end
    object avatarPaintBox: TPaintBox
      Left = 13
      Top = 24
      Width = 64
      Height = 64
      OnPaint = avatarPaintBoxPaint
    end
    object getTypeComboBox: TComboBox
      Left = 120
      Top = 56
      Width = 65
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 0
      Text = '64x64'
      Visible = False
      OnChange = getTypeComboBoxChange
      Items.Strings = (
        '64x64')
    end
    object removeButton: TButton
      Left = 12
      Top = 95
      Width = 75
      Height = 25
      Action = removeAction
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
    end
  end
  object Button1: TButton
    Left = 420
    Top = 39
    Width = 19
    Height = 23
    Caption = 'x'
    TabOrder = 7
    Visible = False
  end
  object pictureDialog: TOpenPictureDialog
    Left = 128
    Top = 240
  end
  object ActionList1: TActionList
    Left = 160
    Top = 240
    object chooseAction: TAction
      Caption = 'Przegl'#261'daj...'
      OnExecute = chooseActionExecute
    end
    object setAction: TAction
      Caption = 'Ustaw'
      OnExecute = setActionExecute
    end
    object removeAction: TAction
      Caption = 'Usu'#324
      OnExecute = removeActionExecute
    end
  end
  object Timer1: TTimer
    Interval = 10000
    OnTimer = Timer1Timer
    Left = 200
    Top = 240
  end
end